Receives two vectors and returns the angle (in radians) between the two vectors Vect1,Vect2

AngBVec(Vect1,Vect2 : VECTOR) : REAL;

Receives two vectors Vect1,Vect2 and returns the vector component of Vect1 along Vec2 in Vect3 and the vector component of Vect1 orthogonal to Vect2 in Vect4

Comp(Vect1,Vect2 : VECTOR;  VAR Vect3,Vect4 : VECTOR);

Returns the standard unit vector of Vect

UnitVec(Vect : VECTOR) : VECTOR;

Receives an angle and a length and returns a vector

Ang2Vec (#Angle, Length : REAL) : REAL;

Returns the angle of vector Vect

Vec2Ang( Vect : VECTOR) : REAL;

Returns a vector which is perpendicular to vector Vect

Perp(Vect : VECTOR) : VECTOR;

Returns the norm (or length) of the vector Vect

Norm( Vect : VECTOR) : REAL;